%(%stdin) (r) file 1 string readstring
{ } loop
